home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
tbmask
/
readme.txt
< prev
Wrap
Text File
|
1993-12-13
|
2KB
|
49 lines
I've been having trouble with the MSMASKED.VBX so this is an
attempt to do masked input in a regular VB text box. You can take
a look at how the input works by running the example program.
It will handle simple masked input situations such as a date, a phone
number, or a decimal number (with or without a dollar sign). It won't
work if you place an immutable character at the end of the mask and
it won't handle commas in a numeric field.
When entering a decimal number, the digits to the left of the decimal
will be automatically repositioned when you enter the decimal.
Input is always in OverWrite Mode rather than Insert Mode.
The following subroutines are in MASKPROC.BAS
AddZeros -> if you are leaving the text box, this will automatically
replace any spaces after the decimal with zeros.
IsADot -> looks to see if there is a decimal in the mask. The
variable DOTCOUNT contains the number of decimals (periods) found
and WHEREDOT is the position of the decimal.
KeyData -> handles keyboard input of data and presses of the
BackSpace Key.
KeyDelete -> handles presses of the Delete Key.
PutCursor -> places the cursor after any immutable characters
when the text box receive focus.
Look at the events for each Text Box to see where the Subroutines
are called.
The masks are in form_load.
If you find any or all of this to be useful, feel free to use it anywhere
you like. No cost, no warranty.
Feel free to send any comments my way.
Bob Craig CompuServe: 70042,1041 Dec 14/93
Salt Spring Island, BC, Canada